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display commends for the DEC 3AQ display, 
and provides supporting functions for scaling, 
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control of certain displays, and for adding 
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In the examples given, ergunents in io*ar c^se are uu:rn..y 
arguments! the user's arguments ere to be substituted* in? sy.,:boi " 
preceding a character signifies a control character, enc sinriir i. es 
the Character “space 1 ". 

An bXrr; subset of this system is available, acecu ate rcr small 
airplays* A SUnP version of these display functions, written in 
HI DAS with control routines in interpretea LIbJ-, is available in a 
special version of LISP calLeo DLlor 1 * As display primitives,, the 
sySt-ena compiles points, open ano closed curves, enc text* Functions 
hanule input lists and arrays in a variety of forms. Special case 
primitives such as coordinate axes, box, ana cross ire useful for 
making graphs ano figures for reports. 

The system provides a sea lino ano trans lation <no rotaticnJ from 
a rectangle in the domain to a rectangle in the ranee, at the tine of 
cosT.pl ling* Only very wo an scaling is available in tne hardware 
tvectors and text Scale by powers of two)? tha best solution is to 
re-compile the list with revises s-;alino* $everfil Junctions aid in 
Cheesing scale. host c iso lays can be translated within the limits of 
the crevice, either with absolute coordinates, or under not control. 

Individual elements of a display can be aeded or removed* uhole 
oisplays can be ssveo, copied, ano restored, A convenience feature 
is that removal of elements can be cone oy blinking each element in 
turn, ano interrogating the tsLetyoe. 
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The system depends heavily on dynamic array a J location inn 
automatic garbage collection of arrays* LISP has been moclfiec to 
Include this feature. In normal operation of the cispJay system t 
elements which ere net oeing displayed or sated, or otherwise 
protected, are garbage collected. 'Ihe user may provide the array in 
soji.e cases„ or the najie of the array, The systar.i normally provides 
necessary arrays as a convenience, A function for oenerati.no 
.Lneiiionic atones is provtued* Except when the user provides the array, 
exact lengths of displays are calculated before array allocations. 
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There are only two atens In initiating a displays 

U type n 'f to select the display device, 

21 iiialce a function call to create a aisplay array* 

This section aims to siceteh cut the general classes cJ junctions 

which are described in oetail in later sections* The naties of oil 

functions in the display system begin wich the IcttEr D* ihe comxanas 

to turn on or turn off the disolay ore control chareoters which con 

ps typen at any tiu'ie to EVAL (even in the Jiiadle of an a tool J* lh^se 

COBiiiiands are handed in interrupt -noce and tal:e effect iaiii^eclately, 

so that they can oe trseo even when LIoP is running. 

riith also lay output selected, elements are displayed as soon as 

they are created. These are reallv two operations, compiling display 

totnjiands (In a LISP array! for the scope, and acting the created 

array to the list cf a rrays on ojsoiay* Two lists contain the 

elements of the display* DISPLAY contains the atoms whose arrays are 

on display (for the oenefit of humans > and DluLlST contains their 

array properties, whicn the lid system uses for display* 

DISPLAY TEXT 

?*)LE 

3* i'o turn on the display 

To turn off the display *Y 

2. To create display arrays and ebd to the arrays being displayed* 
the function useo is specified oy the type of Display oesifed (point, 
vector, or text! anc the typo of input data (list or array of nu;„uers 
or dotted pairs of otoils which evaluate to numbers cr dotted pairs!* 
The following is a list, without details, of availadle functions* 
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DISPLAY TYPE 
TEXT 

OPEN CUJiVE 

CLiiScD CURVE 


rjOIivi 


sOX 

AXES 

CROSS 


FUNCTIONS 

Di'EXr 

OTtXTE 

DCP'V 

DLV1,DLV£ 

1>AV 1 , DAY 2 
DA2V f 
DCHVC 
[)Lvt,DLV2 
jJAV 1 > DAV2 
DA2V l 
DP1L 

JLr 1 | OLP2 
DAP 1+ DAP 2 
DEOX 

DGh ID (tinder p ot cor.tr0 13 

QAXES 

DCHOSS 

DPlij (under pot control) 


3*lbese functions manipulate displays* adding elements to or deleting 


elements fro.a a display* or saving anc restcrinn displays* 

DISPLAY, DISPLACE 
OCLEAfi, dcllahe 
OCUPY 
a SAY £ 

DGcl 


Another class of functions consists of those which move, or 

manipulate individual elements of a display* 

DJfiUVt 
DPT S 
DBRIGHT 
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POINT AND VtCTOff DISPLAYS 

what basic displays might be useful? he might want to display a 

sat of points, or a curve made Cf straight line segments connecting 

points, A usual form of display input iuight be a list of dottsc 

pairs of x ana y coordinates* or a list of such lists, For this 

usual form there are three basic functions* 

DPTL EXPff displays a set of ooints* 

QCEtV E.KP &4 displays open curves* 

CCHVC FXkFi oTsolays closed curves. 

For example, (DFTL list) or (DCfiV Jigt) are typical uses, 

We might want axes* a box* or a cross, Ibe examples are: 

{DAXES (LIST f^I , a?) (ul , u2))> 

< DBDX (LIST (al , a2J (ui , u2)»J 
(DCRUSS name (x , y> sl^e) 

where (al » a2) is the lower left corner of a rectangle aligned along 

the coordinate axes and (u i , u21 is the upper right corner. 

There are a number of other input options for which functions 

exist in the SU pn version* We could have list or array input, rie 

might want to graph a set of values (numbers! evenly spaced along an 

axis* In that case* the x coordinate would be calculated by scaling 

the indices 0*i t 2 f „ * n. The functions are named by acronyms which 

correspond to the options* 

a or L list or array input 

k or V point or vector (curve) display 

I or 2 numbers (graph) or dotted pair input* 

List input may contain atoms which evaluate to dotted pairs* provided 
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the flag DATQM is non-nil* Lhe flag should otherwise be nil Lb avoid 
the associated £o$t of this feature* 


LSULh 


DLV f 

Display 

DLV 2 

Display 

DLP1 

Display 

DLP2 

Display 

DAV1 

Display 

DAV 2 

Display 

DA? 1 

Display 

DAP2 

Display 

DA2V l 

Display 


List of Vectors {numbers) 

List of Vectors {dotted pairs) 
List of Points {numbers! 

List of Points {dotted pairs) 

Array of Vectors (numbers) 

Array of Vectors (K t1 y pairs! 
Array of Points (numbers) 

Array of Points tx*,y pairs! 

2-dim Array of Vectors {numbers) 


Some examples of Cells zsre* 
{DLVI list) 

(OLV [ list ^arrayl) 


(DAV L arrayin arrayout cnin max) 

(0aV \ arrayin max) 

(DAVt arrayin! 

(DAVf arrayin min .;iax)* 

A rray out* min* and max are optional arguments* Win end .max are least 
and greatest incices for the Input array* If min is given* max must 
be given* Th@ default casas for min and max are the limits Of the 
array. 

With the functions for list input* DLV I, DLV2 T CLP1* and LLP 2* 
closes curves can be generated by the calls (DLV I (ICC list))- and 
likewise for DLV2* DUPl* dho DLP2* At present, no provision is .made 
for closed curves for those functions with array input* 

A typical call for UA2V | would be? 

(DA2VI -'(arrayin) (a t . a2i (n 1 . n2! Uul * u2) * Cvi * v2!J) 
over the two-dimensional grid given by? 

xO-a l +i\2*-v I | outer loop along vector fv] . v2> 
yO=a2+n2*v2 

x=xU+n3*UJ iinner loop along vector <u( *u2! 
y »yO+n f *u2* 
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5CALIMG 

points era scaled if DSC ALE is non-nil, The two c coral nates ,.ay oe 
floating point or lixed ooint. LISP numbers, If DAI 01- t& non-nil, 
non-numeric atoms are evaluated to dotted pairs- Sea line and display 
are a mapping from some two-dimensional rectangular DO A AIM into tne 
two-dimensional rectangular t<ANGE I scops coordinat es>, ine lirits of 


scope coordi 

nates 

are 

(0 

* 0) 

to i1177 

* 

1777J. 

Sea ling 

corr-a 

spon 

CIS 

to th 

■e following 

operations 

□SCALE 

m 

( 

sx 

* sy) 

tscale 



□URCD 

a 

( 

XQ 

, yc) 

iorigln 

of 

the Dm. AI It 

LXlftCi? 

s 

( 

xr 

. yr) 

s origin 

of 

the LAJ/CE 

U=SX < X” 

xd)+xr 







v=sy I y- 

yd>+yr 

hi 






The free var 

iables 

whi 

ch 

tontr 

ol the seel 

ino are* 


□Oi'i AIft tlAftGc 

QGtiCD [JOFiGR origin of mapping 

DLOftD DlilhP lower left corner 

DUPD DUPE upper right corner 

□SCALE 

Iwc utility functions aid in determining sea Let 

DOtoAIML tXPR determines the extreme coordinates of a list of 

dotted pairs* 

□SCALE cXPt? determines the scale* given domain and 

range variables. 
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FUNCTIONS FOB MANIPULATING DISPLAY LISTS 


he want to be able to add alements to or ceiete elements from 
.DISPLAY and OTSLIST, to save, copy, and restore display lists* A 
slight complication should kept in mino; ifiost arrays are ateois 
which are not wt the 03L1ST, They cannot be referred to directly by 
naming them* but inust be referred to by somethlnc which points to 
them. That is most troublesome in deleting elaments* A special rede 
in uCLEAft blinks aach element in turn* preserving or deleting as 
instructed by the user in a teletype control loop* 

DCLEAfi FEXP Et 

' CDULtAft) removes ail arrays 
CDCLEAii a b c 1 removes named arrays 

(DCLEAJi TTY) proceeds down the list DI SPLAY, t Linking 
the current array* Teletype eoirmanc's are* 
quit 

T m proceed and preserve the array 
iCJL. kill tha current array* 

DCLtARE EXPR evaluates its argument and removes a single array* 
DISPLAY FEXPfl 

(DISPLAY a b c) adds the atoms to DISPLAY and their 
arrays to D1SLI5T, 

DISPLAY EXPP 

evaluates its argument and adds n single array, 

DCOPY r EXP ft 

(LCDPY world) 

(E3G0FY1 

censes a copy of DISPLAY onto DDaVE with the scene name world 
(or a GENSY& if no na:no is given), 

□SAVE FEXFR 

i DSAV'E world) 

CDSAYE) Is ecfui valent to EDCOP Y) ( DCLEAft)* 
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CGEI FBWh 

UXihl worlc) 

(DGcTi 

appends the saved scene tor ajl scenes if no naije is oiven) 
to DI Sr LAY * 


DISPLAY FUNCTIONS IN LISP 


Pane 10 


DISPLAYING TEXT 


The simplest node of text display uses the display like a 
teletype, as a character output device. Material printed does to the 
scope as to a teletype. The control characters and *Y turn, text 
output on and off, respectively. Text mode anc display .;.do e are 
incompatiblei to label displays, other mcaes must be used* 

The DTEXI display call specifies a line of’ text tprovides for no 
carriage return)* with optional argument for vertical alioncient, and 
optional absolute position, Pot control (pots 146,147) is used in 
aosence of an absolute portion, 

DTEXT FEXPfl 

(DTEXI (line of text) Y p) 

ICTbXT (line of text) p) 

(DTEXT (ltn* of text)) 

IDTEXT {line of text) Y> 

If the second argument is Y, the text Is displayed vertically. If 
not, the second argument is taken as a position, (dotted pair p>. If 
there is no position specified, the text is put under control of pots 
146 and 147) T__ terminates pot control, 

BTEXTE LXPR 

(DTEXTE * {line of text) T p) 
tDTEXTE ' Cline of text) MIL NIL) 

This form evals its arguments! if the second argument is non-nil, the 
line is displayed vertically* if the third argument is noh-n.il, it 
is taken as a position, otherwise position is unbar pot control as in 
ITT EXT* 


The other means of text display is compatible with point and 
vector displays ana provides carriage return as in PRINT* The first 
step is to allocate and initialize the array for text* 
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(AtiftAV nirne ftlL iennthiJ 
(□ISINI 'name) 

Text can. be added incrementally by* 

(D1SAD 'name flag 'abcJ 

The second argument should be T or NIL depending on whether FiilNI or 

PBINC type output Is desired, Positioning is left to the user* The 

hyte pointer is stored in the jast word of the array, 

DISIMI SUBK 

(DISINI 'name} 

initialises the array for character mode output, 

DISAD SUBS 

( 01 SAP 'name flag Mtaxt to be edoiaoJO 
Appends the s-axpression third argument to the text 
In the array na.ue in the print mode specified tyy 
the second argument, 

DlSCUT (display character count) functions as CHiiCT does 

for PPIiJT* 
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OUTPUT TO THE HUmEG 

Any display cso be plotted with the cocnmerid (LjPLor> t which turns 
the paper and plots the current display. Thus, the whole display 
apparatus is available for plotting. 

for special uses* complete control of the plotter is available 
with the coiDi^ands <PL(3T n), where the argument n indicates a 
character* pen up, pen down, etc. (ChAK PLOT, AI memo IPj, V,. 5. 
Specifier l THE CALCOMP PLOTTER IN IS Al\D LISP, A1 memo T35, 5. 

Specifier J. 
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MYIiJCi DISPLAYS AND POT CONTROL 


To move an array with a point position, execute* 

{DUtjtfE it y dname) 

■where dmacne is the name of a display object. 

To oat ermine a rectangle {aligned with the }t—y ax as I in scope 
coordinates under pot control, we execute (EGPIDT^ where 1_ 


terminates* 

he can dipve most arrays (but net all arrays) under pot control 
by using IDPT5 a) where a is an array* if we call fliPTs NIL) we 
control e cross on the screen* he can locate points in the display 
by typing in names to DPT5 which marks the spots with crosses, named 
after the atoms typed in, and sets the values of the ataus to the 
location in scope Coordinates* Such a usage would te* 

(OPTS NlUa_b_c_T_ 


where T_ terminates* 

DPT5 EXPfi 

moves certain display arrays on the scope, under control of 
pots 14b and 147* if the argument Is nil, the array moved 
is a cross. The following s-exprassions are commands-* 

T_ terminate and return 

FINJ=_ enter a fine control mode centering around the currant 
location 

CUAHSE- resume the Coarse position .^ode; the point may shift 
drastically for obvious reasons* 
atraiL_ the atom is given an array, into which a cross Is put* 

and whose value is the current location (dotted pair). 
The cross is left at the current location* 


0 ISP LAV putter IONS IN LL3F 


Page M 


UTILITY FUNCTIONS It* DLISP 


uLISP contains s&ue startaard utility functions; 

-8 S 

SIN arg in rad tens t 10 < X < 3 0 


COS 
AT AN 
SORT 
EXP 
LOG 


same 

{ATAN Y X) computes arctan y/x 


■exp base cl arg -63 < x S3 

-30 36 

log base eg arg 10 < x < 10 
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EXAMPLES 


The following is an example cf a program which uses- the display 

to show the successive stages of analysis* 

(IOC r) 

(EDGES 3 

(CON.D (SHUN CDCLtAR3 (SHCJhcKIIS ) 

CDTEXXE f (ENDEJ :(IL UPPTJJ) 

(CGfcD {PLOT IDPLOTJ)) 

where the function i* r-6t ined as* 


(uti-rwiH SWlWEWCS (LAMBDA {) £PRGG (A S3 
fWAPC (FUNCTION C LAMSDA CX 3 
IUONB (( 5ETC A (GET X (QUOTE CORNERS >13 
(bfeiu & (CO«S A Dili3 

>> SEGMENTS) 


tDCRV d) 


) ) EXWHJ 
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availability 

The two forms are- available ass 

EXPE tUHTAL D13 HXPbt CU.V,) 

SUbii DLISP^H 

C UHlEAD D15 SUBfi COM). 

r'urther implementation is invited - 

Sccie changes and simplifications are planned. Revised versions 
of this description are to be foond on the User directory . iWrO. on 
the ITS system* 


